home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / mainmenu / 00046.ls < prev    next >
Encoding:
Text File  |  1995-04-04  |  337 b   |  14 lines
  1. on mouseUp
  2.   global hints
  3.   if count(the windowList) then
  4.     exit
  5.   end if
  6.   go("return")
  7.   set hints to the timer + 600
  8.   set sleft to the stageLeft + 160
  9.   set stop to the stageTop + 120
  10.   set the rect of window "quit" to rect(sleft, stop, sleft + 320, stop + 240)
  11.   set the windowType of window "quit" to 2
  12.   open(window "quit")
  13. end
  14.